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T/SNUG Information 



Wc wish fo support the fallowinj 
platforms: ZX-80/81 , TS-IOOO. 
Spcctnim, TS-2068, Z88 and QL. If 
you have any questions about e 



Chairman 



Vice-chairmen 

Tape £l JLO PD Library 

D G. Smilh 
415 Slone St. 
Johnslown, PA 15905 
814 53S-699B 

Z88 Library 
Dave Bennett (HATSUG) 
1275 Timber View Dr. 
Mechanicsburg, PA 17055-9146 
717 732-4374 

QL Hacker's Journal 

Timothy Swenson 
2455 Medallion Dr. 
Union City, CA 94587-1914 



TS-2068 

Rod Humphreys (VSUG) 
I09S4 Collins PL 
Delia. BC V4C 7E6 Canada 
604 583-2819 

QL PD Library 
John Donaldson (CATUG) 

835 Foxwood Cir 
Geneva, IL 60134-1631 
630 232-6147 

AERCO & Z80 Emulator 
Keilh Watson 
41634 Amberly Dr. 
Mt. Clemens, MI 48038 

BBS ~=GATOR=~ 
BobSwoger(CATUG) 
613 Parksida Cir. 
Sireiunwood, E, 60107-1647 
630 837-7957 Work 847 576-8068 

Any of the above can also be 
reached by E-Mail through the 
Club BBS 847 632-5558 
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ZXir QLive Alive! 

Is the newslotler of T/SNUG, Ihe 
Timex/Sinclair North American User 
Groups, providing news and 
software support to the T/S com- 
munity in a VOLUME of four 
newsletters per year; beginning with 
the Spring (March) issue. 



l/SNUG's majun goal 
preserve and encourage the 
use of Sinclair computers 

by providing an open 
facum for the exchange of 
knowledge, building and 
maintaitung of software 
libraries. Providing 
vendors, repair service and 
members with free ad 



— groups and individual 
subscribers, rather than the vendors, 
that provide the pecuniary support 
for this newsletter Vendors and 
developers receive this newsletter 
free of diarge, though contribution 
from vendors and user groups is 
gratefully accepted. Please support 
our vendors and service providers 
whenever possible. 

If you have a problem or you have 
solved a problem, please share it with 
the rest of us. No problem will be 
considered imimportant 

ftflitor/Trcisiircr I 
PubliKln.1 
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annual 

for one VOLUME made . ^ 
AbedKahale. Send check 'to'- 
ABED KAHALE 
3343 S FLAT ROCK CT 
SIERFiA VISTA AZ 85S50-6874 
520 378-3424 "A 



Back copies are available for 
51.00 each postpaid. 



Send in your articles by tape or disk and yo 

DONALD S LAMBERT 
13D1 KIBLINGERPL 
AUBURN IN 46706-3010 
Phooe 219 925-1372 
By hardcopy, e-msil or modem (.3-33.6) to 
Abed Kahaie 
E-mail" AKahale;5icompuse 



Geroftf Anson 
Lotiis ylorit 
David. Soily 



G A\TO S 

To better inform the Sinclau- Communilv, 
four 24-hour a day BBSs are now provided to serve 
you. You are encouraged to citchnnge mail and use 
the files sections of dicse boards. Bulletins and ads 
are available to all. 

Q-Bo\ BBS 810 254-9878 

Utica. Michigan 
sec Sever Joje Moreno 
httpV/members tripod com/-helpme/ 
SOL BBS 520 SS2-0388 

Tucson, Arizona 
Club BBS S47A32-5SS8 
Arhngton Heights, Illinois 

If you know the Iniemcl E-Mail address of a 
SinoJoir user, but do not hove access lo hHemei, 
simply addfMS your E-Mail lo GATOR Sinclair on 
die 24-hour Oub BBS and include the name nnd E- 
Moil address of the uaci you wish to reach. Then 
the Club BBS fro 



a reply. 



leifyou 



ntribule lo the UPLOAD si 
and regisier using your fu^ last name 

Write It Down! Do not try to do onyt 

When you caU-in 
Level 5 se 



lies, 



secun^ and be able to enjoy il 
user privileges. The BBS has sranllei- seclioi 
called conferences. Select "J " for '■lam a Confe 
eoce". Select "TIMEff' to gel inla the Sinclo 
Seccon, The mail you then read will only be frni 
other T/S users. Use cocnsion ,ART ft 
ADS for ads and NWS for nc 
LTLOADing. 

Forhelp.contactthsSVSOP.BobSwogn-. by 
leaving a message, mail, E-Mail or phone . 
CENG108@email.moi com 
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\ gol the newsletter, ZQA! - another great job! Nice 
tKtient made about the Arizona scenery! 
J. Shepard and his wife Karen and son Adam - ate 
coming out to the Glenside picnic this Saturday. Sauter and 
Herre will be here also. 26 people expected 

~==GATOR==— 

This has been like a very long lost weekend for t 
just realized that I havent received any 
Times mages for a while, 1 am 
guessing that my subscription elapsed 
and 1 was more concerned with hands 
that didn't work (rheumatoid arthritis). 
How much to get reinstated and collect 
backs issues that 1 have missed? 

By the way thanks for the humor 
messages. You will notice tlial this is a 
different e-mail address and I would 
rather use it Thanks again. 
LesCottrell 



1 was reading what Bob Haitung 
wrote about the nice photos you put in 
the newsletter and got to thinking that 
maybe T/SNUG could "spring" for a 
color ptinter for you so you could send 
us those beauties in color! Hecfc, you 
can get a good color printer these days 
jr around 1200 and all you would have 
> do is print out as many title pages as 
ju needed and still do the rest of it on 
a copier. I suppose it might be more 
hassle than what you're doing now. but 
would 



pretty neat. Anyway, 
it takes a vole of the membership Til 

Fve gotten a Lttle more interest in the RMG items but 
has reaUy slowed down lately. That's OK, as IVe been 
iretty busy at work. Summer is the busy time for bridge 
and highway construction and fve been putting in a lot of 
hours.^ It's just now starting to slow down a little. Right 
now I'm in charge of 5 projects with a total cost of about 
S23 million. Kind of mind-boggling sometimes I still 
haven't heard from Dan Elliott since he sent me the card 
letting me know he was getting to work on the LarKen and 
206B I sent him. That's been at least 2 months ago I think 
rU give him a call tonight to see what's going on Anyway 
thanks for your work on ZQA and helping keep thes^ 
computers alive. 

Take care. Jack Boitwright 

/ Wish, I wish, I Msh we could have color pictures 
in the Newsletter, but the cost will be prohibitive at 
SI .00 extra per one copied pape. Etc etc 
HeUo Abed. ~ 

I know the cartridges are pretty expensive, but it still 
would be neat to see those pictures in color! Tell you what 
I II chip m some $ if you think it would be somalhinE vou 
might do 

I still haven't heard from Dan Elliott since he sent me 
the card letting me know he was getting to work on the 
LarKen and 2068 I sent him Thai's been at least 2 months 

ZXirQLiveAlivel " 1 



A ZQAI reader advised the editor of 
his displeasure because of 
publishing his opinions in a 
previous issue. His Email 
contained inaterial related to the 
Timex/Sinclair community, so it was 
published. He did not advise that 
the material was not for publication. 
ZQA! Newsletter is for and byT/S 
groups and anything related to T/S 
will be published unless the person 
so indicates that it is not intended 

for publication. 
This Newsletter is not the Nafonai 
inquirer or NewsWeek. Most of us 
know or are fsniliar with those 
whose names appear in the 
Newsletter— the T/S family group. 
The Editors teels that any and all 

T/S related material will be 
published unless noted oSierwise. 
Tditor 



ago. ! think 111 give him a call tonight lo see what's going 

Yes, you better give him a call, he either forgot 
about you or it is a bigger job than he thought. 

I did call him and got the amwering machine 
Hopefully I'll hear something more from him soon. In an 
email 1 got from lay a while back I thought he indicated 
that he was going to send one of the ones 
that Rod sent him, but so far I haven't seen 
It either. I haven't had enough lime to set up 
the Oliger with LarKen DOS that 1 bought 
the last time 1 picked up stuff at Rod's, 1 
should just make sure it works. 

Yes, I would iike to be on your humor 
e-mailng list. Some of it is pretty fiinny. 
With the way things are going in 
Washington these days, we need some 



Jack BoalwriBlit 



To:Gil Parrish 
107765,1 161 (gcompuserve ,coin 
Cc: akahalo@compuserve.com 

Subject' ZQA! Vol 8 No. 3' 

Hi Gil and Abed. 

I'm writing my answer on your 
"puzzle-request" in ZXir QLive Alive! as 
an article, so Abed can use it for the next 



In ZQAI Autumn 1998 on page 6, Gil 
Parrish asked for help about a video 
interface. Of coiuse it's a httle bit difficult 
to do some telediagnosis from good old Germany, but 1 
think I will not be wrong with the following information: 

Your interfece is a colour-imerface-module for 
PC8300 WehavesomeoftheminZX-TEAMtoo. 
Plug the interface into your PC8300, connect the short lead 
with the monitor jack of PC8300 and connect your Colour 
TV set with the UHF connector, channel 36, or your colour- 
monitor with the monitor connector. 

But if this will not be successfii!, first have a look into 
your Colour-interface. If you find a crystal with 3,579 MHz 
It will be a NTSC inlerfiice for the use in the USA_ If you 
find a 4.433 MHz crystal, it is a PAL-type and you can't use 
it in the USA. 

The interface works as follows, it has IK Byte RAM- 
memory in the area 8192 - 9216, used as the colour-file. In 
PC8300 the display-file address is fined and not floating 
like in ZX-81, This is imporlanl for the use of the coiour- 
interfece. The colour module lakes the display-file 
information from the monitor output of the PC8300 and 
will "mix" il with the colour-file from the interface to build 
the colour-signal. 
Happy ZXing from Germany 
yours "sinclairly" Peter Liebert-Adcll 
P S. join the ZX-81 mailing-list I send an email to: 
"Ustserv@jara3oft,xs4all.nl" with "subscribe ZX81" in the 
subject line. 

\Vinter 1998 



„ nline.de 
hnp://home.t-onlinede/home/p.lieben/zx-teBni.htm 
Peter Liebeit-Adelt 
Luetzow Str 3 
D-38102 Braunschweig 
Germany 

Amateur Radio: DK4BF(aDBQFC il>NDS.DEU EU 
HeiloAbed,,, 

I understand that you are the man lo contact 
concerning membership to T/SNUG and subscribing to the 
newsletter. 1 was BBS sysop and software librarian for the 
Ottawa-Hull Timex/Sinclair User Group until it folded for 
good around 1995, I also wrote articles for our newsletter 
as well as for Your Sinclair, Time Designs arvd Update! 

1 sometimes use a real live T/S 2068 but for the most 
pan I am now using Genon Lunter's 2X Spectrum emulator 
whenever I need to run Sinclair software 

I still have in my possession all the software —which 
has been convened to the LKDOS platform for the most 
part — and most of the periodicals and news letters lliat 
were owned by the club. I would be happy lo share 
whatever ! (legally) can with whomever is interested. 

I am keenly interested in programming HiSoft 
PASCAL for the ZX Spectrum which I mn on both the T/S 
2068 which has been fitted with a ZX Spectrum emulator 
and on Genon Lunter's emulator. At the moment, I have 
not written any serious applications in HiSoft PASCAL 
Most of what I have written has been done out of curiosity 
to see if the old T/S can do such-and-such a thing. For the 
most pan 1 have succecdedl I have found HiSoft PASCAL 
to be very versatile and able to do as much as can be done 
in Sinclair BASIC and a heck of a lot faster. Most recently, 
I iiave written a fiinction for creating UDGs within a 
PASCAL program. I hope that I can find a kindred spirit 
among the members of T/SNUG. I close ia the hope of 



uing from yi 



David SoUy 
ac3 55@freenet,carleton,ca 
Ottawa. Ontario, CANADA 
Voice: (613)731-2120 



My apologies to all especially to you. Abed, as it 
relates to delayed or unfiilfdled apace in ZQ A The bulk of 
the shipment is cassette SW, a lot of which is unlabeled or 
loose (unboxed) where only verification thru loading would 
prove its value. Is this a daunting task or what? Anyway, I 
decided pan of my problem was tr^ng to find this stuff on 
the list, when it wasnt even there or what I had was a 
panial to the list. 

Also, many of the items need to have a description lo 
complete their value and then there's the desire to know if it 
works or if two or mote, does one work and the other is 
only good for pans and how to decide who gets what or do 
I just reach in and ship and let whomever get whatever, 
13 QL's this was the kicker, not on the Ust and 
sotne work, haven't tested all 
1 1 2068 some work didn't test all 
31 1016 16KRAMPAK in original boxes 
n Magicbridge 16K RAM w/ made in Gr 
Britain on box 

1 Memotech 32K RAM w/ a feed ttmi so you 
stack another 16K/32K on w/ docs 
3 cases 48ea 2040 tfacrmal paper on unopened 
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1 Miracle-disk adapter for Trump Card (QL 
HW) 

4 2040 thermal printer - m orig, boxes like new 
8 Alphacom 32 tfaermal printer. 

2 A&J 2000 drives w/ 30 wafers 

13 LKDOS A3 dock board EPROM's 
13 EZKEV keyboard intetface PCB - no chips 
just the board 
I included the last two items to show the variety of the 
misc. stuff that's not listed. There are dock boanls w/chips 
that 1 have no way of knowing what they are except that 
two are marked w/Oliger's name One says OMger Dser 
Cartridge, ITie other JLO 8084. I could throw them into 
a 2068 and see what comes up on the screen. Or they could 
be fried and could fry a good 20687'??'' And all of this 
lakes time. Later, 

J Shepard 

Jshepard@iielins , net 
John J Shepanj III 

281 130th St 
Ogden IA 50212 
515 846-6378 

Hiroshima '45 - T/S '83 - Chernobyl '86 - Win'9S & Win'98 
Hi Abed; 

1 finally managed to hook myself up with a 2068 
(thanks to Frank Davis), In order to help with my 
addiction, I've set up a email list on my server, I'm also 
working on a website, but that's a few weeks off from being 
online (digitizing manuals, researching components, and 
whatnot). 

I'm writing to invite you and anyone interested 
within the T/SNUG crew aboard. To subscribe, do 
file following; Send an email message from the 
account you want to subscribe to 

MHjordoiiLo@iiniKville.caiii 
with no subject and the content of tbe message as 
follows: subscribe 2068. 

YouH receive a confiim^on reply notice from 
the list mail program; following the instruction to 
complete the signup. If you need to contact the Ust 
administrator, send email to 

2068-owner<Siiiiiiivi II e. com 

1 was hoping that you'd put fliis little note in the 
T/S>fUG newsletter. 

If anything, let me know when the ire meetings 
are, and I'll try lo make an appearance. Also, how can 
1 subscribe to gel the newsletter? Tlanks! 

Louis Flarit 2Q68 List Admin 

See Your Qomelown As Viewed From Space 

Satellite Images of the USA now online at 
http ://Qbserve, i w. nasa,gov/nasa/gailcry/)andsalapp/landsaU 
ppd esc, html 

Ever wonder what your hometown looks like Irom 

You've heard stories about China's Great Wall being 
visible from the Moon (aoiies that, well, aren't true), but 
now you really can check oul the Earth from far above. In 
an online article, NASA's Observatorium lets you observe 
the continental Uniled States— including your town — 
through "SBtellilelmagesoftheU SA," 

Winter 1998 



It's online now at 

littp://observe.iw,nasa,gov/nasa/gallery/landsatMp/landsata 
ppdesc.html 

SalelHle Images of the USA is a collection of Landsat 
saieliile .mages that allows Web surfers to take a virtual 
tout of America from high above. Al your fingertips are 
images of the US you've probably never seen before - the 
country's color, water, vegetation, forests, cities, and more 
as seen from an orbiting space satellite. 

After downloading the images (they're 130K, so allow 
some download time), visitors to NASA's Observatorium 
can v.ew the US &om more than 700 mile s above Earth 
The exhib,! provides a key for viewer inlerprelalion of the 
images, and lets you explore, from an outer space 
perspective, specific are as of the country in simple polnt- 
and-olick fashion. 

Its homepage is located online at 

http://observe.iw.nflsa eov20 

CONTACT Scott Gillespie 
NASA's Observatorium ci 



Mike and John, Don and Bob, 

I am getting ready to get out of the Z88 and the QL 
business on computers. My Amiga business is so large I do 
not have l.me for all of them. 1 am willing to part with a 
large amount of stufE very cheaply, such as MacLinks for 
S5, Senal cables for S3, one Meg RAMs for 180 etc If 
interested let me know, ! have a South American who has 
eiipressed an mteresl but have told him I want to check with 
you USA first. Contact me soon on this as time is 
import ant. A good chance to get a lot of stuff very cheap 
and keep it here m the USA 

Frank Davis 
FWD Computing 



_^t^^/toember3.tripod.coni/--FWDcomputinB/ 

Just got this this evening. Abed., fm shocked! I dont 
know that I want this out in the news just yet until we hear 

more and thmk this over. — =GflTnR= 

] I should have done what 1 just did before sending that 
last note yesterday, but anyway here it is: 

To get a better understanding of whafs going on with 

''"f^ '^iT'"^ "'"^ " '^^ ^« time you need to 
visit his Web site 

http://members.tiipod,com/~FWDcomputing/iQdex hlmi 
you woni believe what's there, fm nol sure how ii all 
relates to his offer to Fink, which doesnt please me but I'll 
bet you can call him. Bob. Please do, JTie bottom line is 
that whats on his web pages provide info that could excite 
^1 of us orphan owners and could reinvigorBte the club and 
the members Ut us know what you find. I'm wiitinc for 
the Z-88 catalog of ritajean@holmail.com next. Later, 

J- Shepar d 

Hi Abed, 

The banks, post offices and exchange house have 
dfffi^t '° ""^^ P^>'™«'" of membership dues very 
1} US post offices no longer accept Canadian postal monev 
orders - even when drafted for US dollars 
2) The banks charge an outrageotis exchange rale on small 
amounts and J4.50 handling fee. An inteniatiomd bank 
money order for US S12 is about Can S22 501 
mI^I,^''''^^^ "°' less than US S20 in 

US dollars. TTierefore, I was thinking of sending you- 
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1) A personal check for Can SIS plus baner or 

2) Can SIS in bills plus batter. ' ' 
As barter, I have about 5 articles on HiSofi PASCAL - 

- both programs and programming— in WordPerfect 5 1 
formal which I can put on a diskette and send with my 
subscnption. There is probably enough material to create a 
2068^ '^^'^ dedicated to PASCAL programming on the T/S 

Please let me know what you want. 
Please give me your ?nail mail address so that I can 
mail you a copy. 

David SoUy 

1545 AltaVista Dr Apt 1402 
Ottawa, Ontario 
Canada KIG3P4 
/ would like to have !/ie above in the next ZQA' 
issue If you dont mind? 

I have no problem with that. 
Takecare. David Solly ac355@freenet,carleton ca 
— Ottawa, Ontar io, CANADA Voice- (6n) 731-2120 
>"If anything, let me know w*en the ire meetings are, and 
ril try to make an appearance," 

/ am missing something here. Please brino me ud 
to date. WhatWho is IRC? 

Hebe, I'm confijsing groups here.. There is a NY 
Sinclair club that has monthly meetings in NY and 
simultaneously on IRC (internet relay chat). 1 think thev 
get together once a month, either the first or second Sunday 
of the month. But Fm not sure. If I find out nilet you 
know, OK? 

T''""'^ LouigFlo ril 

Hi Abed, " ' 

Pm writing from work because I just remembered 
somethmg I wanted to tell you and have been forgetting 
TEJ Computer Services is sriU alive, at least a little The 
owner is Tcmace Jarvij and he still has TS items The 
re^on my mail came back is that he now has a different 
address. 

Tve bought a few of his 2068 software programs for 
S4 each. He staled thai he had hardware and software for 
1 b computers. Fve been frying to get a list of his items for 
quite some lime now, but havent seen one yet I'm not 
really sure if he wants (o be re-listed in ZQA! or not I 
mentioned to him that his lisung was dropped and that he 
should contact you. but I doni think he has. 

If you want to contact him his email is: tej@jps.net 

Jack Boatwri B ht 

From: "John J. (Jay) Shepard. IQ- <jshepard[ffinetins net 

Subject: Fw: Z-88 catalog 

Date: Mon, 12 Oct 1598 21:35:09-0500 

>Thought you two might hke to read this. I got her email 

address as a link on Frank's web-site. I included the gaibase 

It took to get it here as Tve never seen that much before J 

»From: Rita Willis <ritajean@hotmail com 

»Subjecl: Re. 2-88 catalog 

Please send me your catalog. I'm most interested in 
being able to inlerfece my V.4 Z-88 with my PC and OL 
Snail mail address is: 281 - I30th ST.. Ogden, lA. 50212' 
tax number is same as reg ph., 515-S46-637B. 

If you have use for it, please send after midnight 
Central Daylight Time to lessen confusion of occupates 
trying to answer a fax call. Thanks. J 
<« Hello I (7) 

Frank Davis has told me of you that you were a Sinclair 



user. Saul and 1 are presently on a sabalical for a few 
months touring Europe. We are in the process of buying out 
Frank (some of his slock is going to go down to Texas I 
think to John Rish who has done z88 repairs for the last 
several years. 

Til we are back Frank and his wife are doing the 
shipping and such for us We have a package for the PC/QL 
to Z88, li includes all needed cables. QL software on MDV, 
PC software on plug-in Eprom cartridge and PC disk. We 
are selling them at this time as a combo for S40. Should 
you want one before we get back (somt*ime between the 
end of Decmber and the middle of February) just go ahead 
and send the order to Frank and he will lake care of it. 
Otherwise you could just wait. We fell we needed a long 
vacation after spending 30 years with the State Dent 
Sincerely, 



Just a short message to those on this list and their interested 

friends For those of you in places other than North 
America (and who feel you can afford the trip or just want 
lo make il part of a vacation) as well as Ihose in North 
America — we are looldng bI having two QL and it's 
derivatives (as well as other Sinclair and Cambridge based 
computers) shows here in the USA next year. One will be 
near San Francisco on the West coast and the other a bit 
inland from the East coast (probably back at Bedford. PA), 
The time period being looked at is in either May or eaiiy 
June of 1999. Tim Swenson and Don Waltetman (both on 
this list) are looking to be the anchor men out West, and 
unless someone else wants to step up and do it, then my 
wife Carol and I will once again do it on Ihe East coast. 
Now what I need are for people to let me know they are 
truly interested and if so. what they woidd like lo see 
repealed or changed about the previous shows, ff I do not 

hear from enough people. .. then I shall jusl drop Ihe 
whole idea and figure you have no interest. This especially 

goes to ail the lurkers and people who only on a great 
occasion feel the urge lo speak up. As anyone who has ever 
put on a show can tell you there is a lot of work that goes 
into It, We want il to have enough people lo m^e il 
worthwhile for dealers both in North America and 
elsewhere to make the trip. Yep, you guessed it,,, . that 
means they need for people to not just come and talk, but to 
part with some of their money, that is what fiiels finther 
development. It has to at least pay for itself even for 
hobbyists. None of them are under the illusion they will get 
rich by vending at a QL show, . . .but ii at least has topay for 
itself and all the extra would not hurt. 
End of commercial, now back to your reguiar broadcast. 
Most replies lo this can be made directly to me rather tiian 
the group, unless Ihey are a need to know item for others. 
Thanksll 

l£JHlsJ isMaiBraE 



http : //members, tripod.coni/-FWD«miputuig/ 
Working lo make computing fiinl 



I can't get the few links I have to work right. 

Anyway, 1 thought I'd let you take a look and pve me 
some fe»lback, 1 will continue to improve it. but have been 
very busy with work and family so dont have a lot of lime. 
It's at: htlp://www,outlawiietcom/~jboatno4 
Take care, Jack BoitwA 



J" ;3 ft MJ^ Yesterday ;i;3jJbll/3 

>li«\>kfi Yesterday, ^.fllt b llJ^ 
All those backups seemed a waste of pay. 
Now my database has gone away. 
Oh I believe in yesterday, 
b 1| flJ'J} li H Suddenly. I, l| ;3 Jfl l] 
There's not half the files there used to be. 
And there's a milestone 
hangmg over me 
The system crashed so suddenly, 
1 pushed something wrong, 
what il was 1 couldn't say. 
Now all my data's gone away 
and I long for yeslerday-ay-ay-ay. 
Jij5)JbllJ3 Yesterday, J';^ttbli;3 
The need for back-ups seemed so far away, 
1 knew my data was all here to slay, 
J> J5 Ij /3 Now I believe in yesterday. J^fi\\fi 

I have about 4 articles ready lo send you. They all deal 
with HiSoft PASCAL progranuning. In fiicl, there is 
probably enough to lo make a special PASCAL issue of 
ZXirQLiveAlivel 

Will you have any problems decoding Unix-to-Unix 
Encoded Word Perfect 5,1 (DOS) files? I believe I asked 
you this before but I seem lo have lost your reply. Also, are 
you familiar with what a PASCAL source code listing 
should look like? I am sure you do but I am asking because 
1 once submitted a source code listing lo a newsletter as a 
WP 5 ! file only to have it botched up because the editor 
used a proportional font to print out the file which ruined all 
the indentation in the source code Usting 

If you get back to me. I could probably send you some 
files tonight, 

David Solly 

/ can decode almost any TEXT laimat. 
Anicles are welcomed, anytime I'l Thank you. 



Hi Abed, 

I have finally published my very primitive TS web 
page, I'm still not ready for general release to the public as 
ZjarQLivcAUvel ' ' " ~" i 



Dear Abed, 

I am sending you a check for $20 towards my nem 
year's membership subscription to help keep ZXir QLive 
Alive! and well. 1 really enjoy being kept up to date on 
what is going on in the Sinclair world. 

I have a problem thai you may be able to help me 
solve, I am just about 82 years old and find that J have 
accumulated a whole lot of Sinclair computers, an original 
Mcintosh that is a Mac Plus, and even an old TRS-3 with 
two 80 Irack DSDD drives, 1 have a ZX-Sl with a ftill 
keyboard, program tapes, 64K memory, two Westridge 
2050 modems widi Sman Terminal 1 I also have a Timex 
1000 plus many folders of documentation for these 
computers. 

I have a TS-2068 with AERCO 40 track DSDD floppy 
drives plus the CPM program with 80 character lines and 
documentation plus LKDOS plug-in V3 for FD-68 disks, 1 
also have an interesting adapter for the 206B that lets you 
write out phonetic words and senten ces in English and it 
Winter 199S 



will actually read what is written and speak h back on the 
adapter's loud speaker. This program uses the three voices 
fm^ '^'^^ buill-in sound chip to accomplish this amazing 

1 have an extra QL computer that 1 find as surplus and 
not needed anymore. 

What would I do with this equipment to put into 
someone's hand who will want it? [ am not thinking of 

selling it but maybe i could give it awar lo 
loneone who woold m li lor a good pDrpflie. 

I will keep my QL with its GoldCard, Minerva ROM. 
Hermes 220, two 5 80 track DSDD floppies, two 3 W ED 
floppies, and a Qbide hard disk setup and a Seikosha serial 
printer. I will keep my Z88 with its Epson serial printer t " 
find It very portable and it works with my Mac as well 
the QL. For the moment. 1 will keep the Mac because 
the info currently stored on its hard drive and the several 
programs and fonts available that are not on the QL 
As you can see. 1 really have to peel down and dispose of 
some of this computer equipment before I get too senile 
use any of iL I find Thai I haven't used the ZX-SI's a 
TS-206e at all now that 1 have the QL setup, 

A second problem thai you may able to HClP DC 

solTC ti (0 Ond a vorung copy oi Assemmer 
WarkBencli v 1.5 iiy laicni compnier in England 

wrote to them but they must be out of business since they 
never answered my letter. Their program came on a micro 
cassette to act as a key so that the program will bool 
properly. My original tape and its copies all failed by the 
tape gettmg stuck in the cassette case so it won't play at all 
I have all the programs pioperiy copied on my disks but the 
necessary keyed tape is missing. Do you have any 
suggestions of where to look foi a good working cony of 
Assembler WrokBench? 

Please keep up your good work forus Sinclair us.... „ 
this IS one set of computers that I can program and 
understand without a lot of new learning reijuired The 
programs I use are sunple and I do not need iimcy Windows 
ytf etc. to do the simple tasks I need to accomplish 
Sincerely, John Pegram 
1126StradellaRd 
Los Angles, CA 90077 
310472-2467 



Dear Abed, 

.... t did buy many items fi-om Jack, Thank you for the 
information. 

I have plenty of other computers... an IBM compatible 
and some Commodore ones,. .but now 1 am concentrating 
on the Tmiex computers, because there may be little or no 
electricity available on and after Jan. I, 2000 

Last year I bought an invener for my car that puts out 
iiO watts of contunious AC power, enough to run a Timejt 
1000 computer, Timex 2040 printer, and a small black and 
white television set. By using a <long> eflension cord 
computmg IS possible from inside the house 
Your friend, 

Jerry Anson 

. jenva(3isztec2.asu .edu 

HeUo Abei ~ 

He got the Larken fixed (had to replace 5 chips) but 
had a note saying the SCLD chip was out on the 2068 and 



he couldnt fix it. I have another 2068 so thaf s not a huge 
problem. 1 havent had time to set it up and may not until 
after the holidays are over. Pm taking 2 weeks off starting 
the 19th, so maybe 

rU still get it set up before the New Year 
Take care and Happy Holidays, 
Jack Boatwrialil 



Dear Sinclair Users 



This letter is to announce the West Coast Sinclair Show 
tentatively scheduled for 5 June in Union City, CA Before 
going loo far into organizing the Show we are looking in 
how many local Sinclair useis would be interested in 
attending the Show. Based on this survey, we can eithe 
press forward with the show or cancel it due to lack of 
attendance. 

Place; Union City. CA ( 15 miles south of Oakland & 1 5 
miles north of San Jose} 
Date: 5 June 1999 
Time: roughly 10:00 am lo 5:00 PM (subject to change) 
Cost: approx. S5 - J8 (depending on cost of show location) 
Motel of Choice: South Hayward Motel 6 (510) 489-S333 
The Show will have something of interest for all Sinclair 
users (ZX-Bl, T/S 1000. T/S 2068. QL, andZSS). We plan 
to have a number of dealers from Europe, primarily Jochen 
Merz Software and TF Services (Tony Firshman). There is 

a lot of new development in the QL world, including a 
whole new QL/QDOS based system called the Q40 and the 
Milan, an Atan-based system that will run SMSQ. a QDOS 

based operating systems. 
For the Z88 there is a new newsletter coming out of Ireland 
and a bunch of newly available applications. It appears that 
FWD Computing (Frank Davis) has dropped support for the 
QL and Z88 so we are looking fo find out who will pick up 
his service. For the T/S-2068 and T/S-1000 fan we plan to 
have some information about MS-DOS based emulators for 
both computers, including the new Xtenderll. 
We still do our best to make the show interesting for al! 
Sinclair users. In addition lo vendors and information, there 

IS always the enjoyment of meeting others that share the 
same computing interest Many of us compute by ourselve 

and rarely get a chance to talk lo another Sinclair user 
After attending a number of US QL shows, we know ftiat 

die camaraderie is the best part of die show 
For tiie veiy local or those staying in a Motel, on Uie night 
before the show there will be an infonnal Bar-B-Q held at 
Tun Swenson's house. Just 1,5 miles from the Motel 6 
What we are asking of you. is to let us know if you are 
mteresled is coming to the Show, The existence of the show 
depends on getting enough attendees to make il worth the 
trip for the European vendors This is not a commercial 
show It is a show put on by a Sinclair user for other 
Sinclair users. Please contact Tim Swenson via phone 
Mail, or e-mail if you are interested in attending or have 
any questions. If you are no longer a Sinclair user and do 
not want to be contacted farther, please let Tim know and 
he will let other mailing lists owners know 

We hope fo see you there. 
The West Coast Sinclair Show Organizers 
Don Walterman 
& Tim Swenson 
2455 Medallion Dr. 
Union Cit CA 94587 
(510) 489-8944 swen3onl@jaek.sns.com 
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Sunon. Thomas 73177.J33(S>compuserve com 
Skapmski, Tom tskapins<fl!|uno com 


Albrecht. Alvin aralbrectSconcentric net 


bimilh. JJermis deimy smithffiiuno com 


Anderson, Paul p.adersoru® cwix.com 


Solly, David acf^'^fflfyeenel carleton ca 


Anson. Gerald ierryalSiaztec.asu edu 


SiCBman. Dan dansteaffliuno com 


Barker Rabin Robin® di-tea demon co uk 


Swenson. Tim swensontc(fiiHeocili« com 


Bennett, Dave dhennettlO^desuDcmel net 


Swenson, Tim swensont|^3UT:live csd sei com 


Boatwricht, Jack iboalno4(aaullawiiel com 


Swentko. Wally wswentko®maroon tc umn.edu 


Boehm, Al boehm(aiiinlink net 


Swoger. Robert cenRi08(ffiemBil mot com 


Bdehm, Bill bo€limffl,plh af mil 


Taylor, jeft letavlonStSDar.ca 


C- A. T. S. niffi002(Siepfi2.eDflbalto orR 


Thoresen. Jeft 74200,257facompuserve com 


Cable. Bdl bcableiairiton.coal com 


Waherman, Don waitennfoJix. netcom.com 


Chambers, Georae afchambiapalhcoui com 


WashuiKlon, Bany mfD002(aiepil2 epHballo ora 


Collins, BlH bcollinsOhome iix net 
Cottrell, Les iacottre(aale net 


BUG in SOL BBS 

Well, I found one, and there may be others, os you can see 

After Lany Kenny called the BBS. xve decided lo 
receive remote messages with the use of the instruction 
INPUT#7,AS, since il is unplemenled at the (fasl) system 
level, rather than m Larry's (slower) BASIC code. 
AS^^ ''"t If^UT AS cannot accepl quotalion marks 

So, (his is a request for any additional characters besides 
the quotation mark, which causes [be INPUT AS 

KEEP ON'riMEX'n 

David E, Lassov: Sysop, 
SOL BBS @ 520-882-0388 (data ) 520-882-3972 (voice) 
emanon@a2staniet.com (email) 
2590 N Jordan DR 
Tucson AZ 85745-1 132 


Cniz-Flaueroa, Jaime cmzfieuer®iiol com 


Dansbv, Andrew adaiisbv(^atlantic n« 


Davis, Frank fdavisOicruest net 


Enaiand, William weneiandffliname com 


FenR, Al alfenBfSiuno.com 


tink, Mike domino. cubesSiexcelsior net 


Florit, Louis flpritfflwormhole unixville com 


Franke. John i.m.&infce(aiarc nasa aov 


(janser, Garv BanHerB®diiia.orB 


Gillespie. Dour Ba43 KSlcleveland freenet edu 


Uimiua. William Eirnius w(S!bls,Rov 


Haibil, Ken krhOSiacsufresno edu 


HenderliRht. Mike mikehendiamicrosoft com 


Henn, Fred oranurOiuno com 


Hunkins, James jdhunkit^ibni net 


Jmpellnerri, John impellizerri^acompripipn/i- mm 


Jaap. Matthias Matthias JaapOhhs hh schule de 
Jonas, Mike mionas(S)hbn com 


Abed, ■■ 
First, thanks for the cartoons, they help to brighten a 
busy and overworked day. For a few weeks now, with the 
Xmas season upon us we have been getting between 2-300 
Amiga software orders a day so are quite busy 


Jones. TerTY tioneaffiiiname.com 


Kacior, Jon 75363. 1 1270compuse[vc com 


Kahale, Abed akahaJelSlcompuservE com 


KeaJy, Hamrt Joan hikeaJvfSadmin hilconet com 
Kmftslev, Ed elk4(aaol com 


1 had memt to do up an ad for the next issue but 

seem to have run out of time. 
All of my Z88 and QL stuff is sold. What I 
do have left is T-shirts for QL, TSNUG 
and Z88. I also have mouse mats for 
them. I also still have my Speccy97, Retro 
Gold and Speccy Classix CDs and amiga 

Forever CDs that were in my last ad. 
Prices arc the same and what is not sold by 
the end of January goes to Brazil. Anyone 
who wants any of this had best do so soon. 


K-OniR, Urs urs.koeniE(SaBrodalB.ch 


KuitK7 kurtk7(aaol com 


Kwidcowsfci. Phillin twit47(aaol com 
Lancaster, Garry dharfchiaiadelohi com 


Lassov. David emanonf^azslaraet com 


Lebowitz, Dave dkliadpliv com 


Lessenberrv, Gary slessenb(^usr com 


Liebert-Adeh. Peter p,iieben®l-online de 


Mallov.Bob 74776 1 lenacomnuservecom 


McKelvev, William mckeivevwiSJdelphi com 


Merz. Jochen iochenmeirfSji-m-s com 


Miller. Seymour scvmiliSdeiphI com 


Muth. Bob bobkeeoerKSaol com 
Norton, Gary snoitonliiworid sld com 


Panish. Gil H)7765.116153compuse[vecom 


Thanks, Frank 

FWD Computing 

PO Box 17 
Mexico IN 46958 USA 

fdavis@iquest. net 
htlp :/ /members, tripod. coni/~FWDcomputiiig/ 

Working lo make computinB fun' 


Pashloon, Nazir inzir,DashtooD(^Brani micro com 


Psvne, Josh ioshpavne^biRfoot com 


Pazmmo. John iohnpazminofffimoondoe mm 


Penv, Russ Jr slapdashtffienleracl com 


KiRter. Wilt riulerffiicafe.iiel 


Rish John 7460 1 , 1 535(a)compuserve com 


Shepard. Jay ishcoardlSnelins.nel 


ZXir QLive Alive! r 
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FROM THE CHAIRMAN'S DISK S 



Donald S. Lambert 



Iwrolc to Tim Swenson lo aalt about the 2050 serial port 
to ZB8 and he gave me what he though! was the proper 
way to intetface il. But it leaves a little to experimEnt 
with. However I leaned thai Tim now has a house and a 
new address, (see Unclassified Ads section) 

Had a call from Fred Stem and he repotted thai Bob 
Gilder died on or about the first day of November. A 
neighbor had noticed him sitting at the kitchen table 
in the evening and he was still there and looked hke he 
wasn't moving the nea morning so he called the pohce 
They broke m and found him dead Bob was one of the 
dedicated members of LIST 

Wrole Jack Boatvmght in regards to my having to 
dispose of my newsletters and TS 2068 
equipment and I 
haven't heard from him I 
had offered to v^nd it 
shipping free so I guess 
the offer still goes 
MHWhile 1 have disk 
dnvcs that will 
work on the TS- 
2068 and Oliger or 
LarKen disk interfaces I 
won't ship them without 
postage rein*ursement 
since they arc really 
heavy. The drives would 
include several drive cases 
with power supphes I will 
need to know in December 
since I wdl have to start 
cleamng them out soon. 

A plated from here in 
Auburn during [he 
year of 1999 and al 



could be clamped to. So I replaced that. All 1 can say they 
sure have made h easier to replace with a different type of 
assembly. I have put in three prior disposals and all of those 
bad to be hold up while you oied to connect them up to the 
sink. Now you conned a subassembly lo the sink and then 
you rotate the disposal mto place which makes it very easy 
And the first time 1 did not have to redo the plumbing to gel 
It to fit. I was amazed at how easy il was. 

The nigh! of November tenth a portion of our privacy 
fence was blown down by Ihe storm. What actually 
happened was thai two posts had rotted and broken 
off at ground level. And our homeowner's insurance has a 
hundred dollar deductible. And so lo save the hundred dol- 
Iw^^ssw abled the falle n fence and borrowed a clamshell 
post hole digger and dug 
' two holes next lo the ce- 




nplac 



n old p 



of pressure treated 4 
4 s The lumber and the 
two bags of readymix 
was delivered Monday. I 
fimshed the fence yester- 
day (November 18(h). 
Sunday (November ISlh) 
our garage door opener 
quit raising the garage 
door. The helical gear 
that the worm gear that is 
on the motor shaft turns 
apparently has stripped 
all Ihe teelh off. So Tues- 
day we went to Seais to 
see if they had an opener 



that 1 



aiiiar 



sure ) have been gi' 
ultimatum of not moving 
boxes and boxes of com- 
puter JUNKI The JUNK I 
is ray wifes words not 
mine Later I will work 
with an MSDOS clone of 
some kind and will very 
likely have the ZX-«i and 
TS-2068 emulators as well as the SPECTRUM And I will 
still have the ZBS so I will still be in the TS community. 
I saw Frank Davis last Saturday al the Ft. Wayne Ham and 
Computer Fest. Since Frank is mainly into Amiga he is 
doing great in that field. Still has some ZB8 and that sort of 
stuff to " 

m having a lot of household troubles. Not with 
^wife but the house. First wo put in a new dishwasher 
IS disconnected from the old 
dishwasher the connector on the disposal for the dishwasher 
discharge hose was broke off to the poinl where il barely 
ZXirQLive Alive! ' ' ' 



that died. There are 
some differences could 
have probably used the 
same track and chain but 
I didn't want that lo go 
bad and have lo redo the 
installation. 1 started that 
this morning and right 
now 1 am installing the 
light beam and sensor 
which is a feature that is 
mandatory for garage 
doors now. Supposed lo prevent injury to a child or dog or 
even ^ person. In the morning I will finish the installation 
and then do the set up for proper closing and for the safety 
features. Right now 1 open and close the door manually and 
lock it by Clamping a C clamp on the track. [ lucked out 
since they had these units on a special .purchase and sale 
plus a coupon discount. ILe old unit was in use 16 years. 
The hfe of a garage door opening is from 15 to 20 years. 

Iooting at the electronics of the garage door contnDller 
J I see that il could be easily converted to turn on 
^somethmg. It would make an interesting project, 

Wimer 1998 



Back to uptoflding and down loading prognuns &om the The disks are about a Gflh the cost aod there is a lot more 

Z8S to the TS-2068: I remember seeing an article about capacity on the CD 

how to use a modem to modem with out Ma Bell being aVWilh ail our ffouble with our house I guess we are 

bmvcea I will find that and get the 2050 modem and the MTluety since we don't have hunicane or floodiog 

288 modem going - I hope. ■« damage. 1 have seen the destruction in Germany 

1 have been looking at the PC's and have staned to figure during W.W D and in Korea during the war in 1950 and 

bout when some of the salespeople are spoofing me. I was 1 951 . If you don't have too much and you loose that 

ongmally wanting to use a ZIP drive BUT1 I was lead to This is it till next time 0/0 

understand that would be better ofF with a CD ROM burner. 



Using 3^O9P_^OC0(Eq^ 



l,yAL Feng 



Over a year ago, I read a request asking how to use 
the FOP_OVER facility found in TK2_EXTEnsions 
instead of OPEN_NEW, 
Others are better qualified to explain some of this. Lei me 
simply Slate that you need to OPEN a device before you can 
l; and, when you are done using it, you should 



ir trap for a 



CLOSE i 

Tsing FOP_OVER lets you 

II "bad" medium — where "b; 

^" variety of problems such as a missing physical 
medium. If the etror is recognized, instead of having the 
program crash, recovery can be to another location in the 
program. 

/^C%e following examples are actual PROCedures used 
OJin both QLAMBer (FOP_OVER) and QLATter 
^— ' (OPEN_NEW). 1 hope this is still usefiji 
information, and my apologies for its tardiness 
HERE'S HOW 

Comparing and contrasting should be the easiest way 
to see how comparable tasks are implemented; so, 
this is more show then tell 
To begin with the obvious, here is the PROCedure used in 
QLATter. 

650 DEFine PROCedure Access; DIM ZS(6I0 32) 
DELETE tS&a&FS 
660 0P£N_NEW#6,tS&a&FS 
670 DlR*i6,tSa&*'_"&RNS: CL0SE«6 
680 0PEN_IN#7.tS&a&F$: FOR cO TO 610 
690 IF EOF(#7) THEN EXIT c 

700 INPUT*/7,ZS(c): END FOR c: CL0SE#7: c=c-l- END 
IF : END DEFine 

You should be able to see thai the PROC- 



edure using FOP OVER is very similar. 
650 DEFine PROCedure Access: DIM ZI(6iO 32) 
DELETE tS&a&FS 
560 ul[-F0P_OVER(if6,tS&a&FS): 

IF uk<0 THEN iX: CLSd: AT#2,24,37- REP0RT#2 uk- 

PAUSE 50: zCLS. tre=0: WCh 
670 DlR#6,t$&a&"_"&RNS: CL0SE#6 
680 0PEN_IN#7,tS&a&FS: FOR cKi TO 6 1 0 
690 IF E0F{#7) THEN EXIT c 

700 rNPUT#7,ZS(c): END FOR c: CL0SE#7- c=c-l ■ END 
IF: 

END DEFine 

ZS(q,l) is a DtMensioned array where 'q' is the number of 
entries (in this case 610, two of which are related to the 
medium header) and T (the filename length is 32 
characters long in this instance). 
I use vari^les, but you don't have to: 

tS - "flp" 

a=l 

F$ = "_FUST_imp" 

RNS = (this is optional; and, can be omitted) 
mm DEFine PROCedure ix. PRINT '"invalid 
device'':END DEFine 

nnn DEFine PROCedure iCLS: (clears part of the 

mm DEFine PROCedure WCh: (this is where I want the 
program re-directed; 'He' is a pointer). 

I hope these tvra examples and limited explanation are 
adequate. 

If you have any questions, fed free to contact me. 
flappY grails. 
A^-t CompuHnfl, Sib tSu 



A LiUT.4 of L^rKen ProceJu.e. «nJ ]=ur,ction. In j-JiSoft""^ 

PASCAL for Sequential PL j^.nJIlng 

Edited by David Solly 



Written by Larry Kenny 

HSoft PASCAL source code provides the 
procedures and fiinctions required for reading and 
writing sequential files to a LnrKen DOS fbraiatted 
diskette. 

Program LkDOSLib, 

A Library of LkDOS File Procedures and Functions 
OpenFile- Open For Sequential Read 
RdChar - Read I Char From File 
Eof- True If Last Char Has Been Read 
CloseFile - Closes Buffer, Frees DOS Commands 

ZXirQLiveAlivel "'""*" H 



GoToDrive - Select Drive 0 or 
Catalog - Simple Cat List 

1 istory: 

I Written by Larry Ketmy 
I Navan, Ontario, Canada, 19 
VAR C : CHAR; 
A : INTEGER; 
FLAG : BOOLEAN; 
FUNCTIOK Eof : BOOLEAN; 
BEGIN 



I 

1 I" 



INLINE (#CD, #62, #00, #3A, #0F, #20, #FE, #40, 
«2S,)t04,#3E,«FF,#ia,#01,#AF,#DD,n7,#02, 
#CD, #BA, #001 ; 
END; 

PROCEDURE CataTogV 
BEGIN 

INLINE [ BFS, #CD, #62, KOO, #AF, #32, #1D, #20 
, #CD, #7E, #00, #CD, #7B, »00, ni, #88 
,#20,#3E,#0D, #D7,«06,#03,#23,#7E 
,#FE,#FA, #2e,#20,#FE,#FF, #20,#F6 
, #23, #7E, tfFE, #FE, ((28, #F0, #7E, «FE 
,#FD,#2a,#06,#E5,#D7,#El,#23,#ie 
, #F5, #05, #2B, #DD, #3E, #20, #D7, #3E 
, #20, ttD7, #1B, #DA, #CD, #BA, #00, #00) ; 
WRITELN; 



, #DD, #6E, #02, 



e [DV: INTEGER); 



PROCEDDRE C 
BEGIN 

IF |DV=0) OR (DV=1) THEN 
BEGIN 

DV:=(DV+1('2; 
POKE(23728,CHR(DV) ) ; 
INLINE (#CD, #62, #00, #3A, #B0, #5C, 
#32,#03,#20,#CD,#BA,#00) ; 



PROCEDURE OpenFile; 
BEGIN 

WRITE ['ENTER FILE TO OPEN ' ) ; 
READLN; 

INLINE(#CD,«62, #00, #21:, #aF,#77, # 
#20, #06, #0A, #7E, #FE, #20, #30, #02, 
#3E, #20, #12, #23, #13, #10, #F4, #3E, 



#00, #32, #B0, #5C, #CD, #S4, #00, #3A, 
#20, #20, #FE, #0A, #25, #2B, #CD, #87, 
#00, #21, #44, #20, #22, #2C, #20, #2R, 
#ZC,#20,#23,#22,#2C,#20,#7E,#FE, 
#F9,#2B,#19,#32,#1D, #20,#CD, #7E, 
#00,#CD, #76, #00, #21, #8 3, #2 0, #22, 
#7C, #20, #3E, #4 0,#32, #0F, #20,#1B, 
#03, #32, #B0, #5C, #CD, #BA, #00, #00) ; 

IF PEEK(2372B,C1IAR)-CHR[10) THEN 

WRITELN( "FILE NOT FOUMD' ) J 

PROCEDURE RdChar ( VAr" ChTcHArT; 
BEGIN 

INLINE |#16, #05, #CD,#6A, 

#DD,#66,#03,#77); 
_ END; 

PROCEDURE CloseFile; 
BEGIN 

INLINE (#CD, #62, #00, #AF, #32, #0F, #20, #CD, # 
BA, #00) ; 

^ND; _ 

BEGIN fMainlTi" 
Demonstration ] 
GoToDrlve (0) 
Catalog; 
OpenFile; 
REPEAT 
BEGIN 
RdChar (CI ; 
WRITE Id ; 
END; 



DataStoreO and DataFetch() 

Two LarKen DOS Procedures For HiSoft™ PASCAL B,Da.,dSoih 



When you have become spoiled by having a disk diive 
sysiem on your Timex/Sinclair 206S, such as I have, 
you soon begin to wonder what use is there in having 
a compiler which allows you to write programs which are 
easy to maintain and run Hke wildfire when compiled but 
grind snail's pace when they have to access the cassette 
drive to store or fetch data ' This has been the problem 
with mSoft PASCAL. Vmio« 4 compiler for the 
Timex/Smclair 2068, (henceforth: PASCAL); however, 
with the new procedures DafaSloreO and DataFetchO 
variable data can be stored to and fetched from disk under 
LarKen DOS. 

How The Procedures Work 

All versions of PASCAL use a slack in one form or 
another to keep track of parameter passing amongst 
procedures and functions. HiSofl PASCAL uses the IX 
raster to perfbtra this function. In the case of 
D»t«StoreO and DaUFetchQ, thirteen bytes, starting from 
IX+2, become reserved in the DC register when the 
procedure is called. Depending upon whether it is the 
DataStoreO or DataFetchQ procedure that is being called, 
lytes contain the number of bytes which are to 
ir from the disk. This number is usually 
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passed to the procedure through the function SIZEQ- ' The 
next two bytes contain Ihe start address of the segment to be 
transferred to disk or to where it is to be placed in RAM. 
This address is usually supplied through the iiinction 
ADDRQ. The remaining nine bytes contain the name under 
which the data will be stored to, or. fetched from the disk. 
In the demonstration program the variables Name and 
FileName have been created of Ihe user defined type 
iostring to pass the file name from where it is read from Ihe 
keyboard to the procedures. Once the required information 
has been passed lo the procedure being called, the INLINE 
routine in turn transfers the infonnation to certain memory 
locations in the LarKen DOS cartridge and invokes the 
proper routines within LarKen DOS to store or fetch the 

Demo Program ^ 

The demonstration program creates a small telephone 
directory in which you can store ten names and ten 
numbers. The program will ask you lo enter ten names 
and numbers to fill the directory. Next it will ask for a 
name under which to store all the data which you have 
entered into the variable Directory to the disk. Finally it 

.k. CI of the data lo retrieve from the 

Winter 1998 



uill ask for Ihe file ni 



disk. When you fiisl run the program you will have to 
reuse the name you jusl used lo store the data or the 
program may crash. If you run the program several times 
and create a number of files on the disk under different 
names you can then use any of these names and the data 
stored under the name selected will be retrieved and 
displayed. 

Program LISTing 
TelephoneDirectoiy 
Purpose 

This program creates a small telephone directory lo 
demonstrate how data can be write and read to disk under 
LarKen DOS using the procedures 

DataStoreO and DataFetchQ and also lo 

demonstrate how a type may be developed to 

emulate the type String which is found in 

olher versions of PASCAL 

History 

Based upon an example in the KiSoft PASCAL manual. 
String emulalion by David Soily. 

LaiKen DOS 1/0 features by David Solly and Larry Kenny, 

Ottawa. Ontario, Canada, 

25 March 1990. Revised: 4 November 1998 

CONST 

MaxLen = 32; {Maximum length for the "string" } 
MaxEnt = 1 0; | Maximum number of entries in 
the telephone directory I 

TYPE 

) An array type for holding file names ) 
FileNameType = ASRAY[1. 9] OF CHAR; 
( A special type to emulate a "string" ) 
ScringType = RECORD 

CharStr : ARRAY [1 .MaxLen] OF CHAR 

Len : INTEGER 
END; 

{ A base type for each entry in the directory } 
EnlryType = RECORD 

Name : StringType; 
Number ; StringType; 
END; 

VAR 

Directory : ARRAY [!,, MaxEnt] OF Entry Type 

I : INTEGER; 

Ans :CHAR; 

FileName ; FileNameType; 
PROCEDURE StrRead (VAR EntiyData : StringType); 
{ A procedure to read each character (hat is 

entered while keeping track of the number of 

keystnakes as the information is placed into 

the array ) 
BEGIN 

EntryData.Len ~ 0; 

I R«iuired in HiSoft PASCAL, 
see the manual j 

IF EOLN THEN READLN, 

WHILE NOT EOLN DO 
BEGIN 

EntryData.Len .= EntryData.Len + ! ; 
READ(EntryData.CharStr[EntryData Lenl) 
END; 

READLN; ( Required after READ ) 
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END; 

PROCEDURE StrWrite{VAR PrinlDala : StringType); 
{ A procedure to write oirl the information 

contained in each string ) 
VAR 

Letter . INTEGER; 
BEGIN 

FOR Letter := 1 TO PtinlData.Len DO 
WRiTE(PrintData.Ch3rStr[Letterl) 
END; 

PROCEDURE ReadData, 

{ Aprocedurelo read names and numbers 

into the telephone directory } 
BEGIN 

PAGE; 

FOR 1:=1 TO MaxEnt DO 
BEGIN 
WfTH DirectoryP] DO 
BEGIN 

WRTTECEwer Name ',1:2,', Please >')■ 

StrRead(Name); 

WRITELN; 

WRITE('Emer Number, Please >■); 
StrRead(Number); 
END; 
END; 
END; 

PROCEDURE PrintData; 
{ Reads the information contained in the 
leiephon directory j 
BEGIN 

FOR I , = 1X0 MaxEnt DO 
BEGIN 

WITH Dlrectoiy[I] DO 
BEGIN 

Sh-Wrile(Name); 
WRTTEC 0; 
SCrWrite(Number); 
WRITELN 
END 
END 
END, 

PROCEDURE DaiaStore (Name : FileNameType; 
Slart, Bytes : INTEffiR); 

Writes data to the disk 

Concept and research by David Solly. 
Machine code by Larry Kenny. 
BEGIN 
INLINE ( 

KFi, BCD, #62, #00, i¥3E, SOB, S32, HOI. 
»20. #DD, #E5, #21, #22, #20, #06, #09, 
#DD. #7E, #06, #FE, #00, #20, #03, #3E. 
#20. #77, #23. ma, #23, #10, #F1 #DD 
• #EI. #CD, #CC. #00. #DD. #6E, #04, #DD 
#66, #05, #22, #33, #20, #DD, #6E, #02, 
#DD, #66, #03. #22, #31, #20, #CD, #CF 
#00, #3A, #64, #00, #FB 

); 

END; 

PROCEDURE DataFelch (Name : FileNameType; 



Start, Bytes : INTE(BR): 

Purpose: 
Reads a file from the disk: drive. 
History: 

Concept and research by David Soily, 
Machine code by Larry Kenny 
BEGIN 
INLINE( 

#F3. #CD, #62. flOO, #3E, #64, mi #B0 
#5C, #3E, SOB, U32. #02, #20 HDD #E5 
#21, #22, #20. #06, #09, #DD, #7E '#06 ' 
#FE. #00, #20, #02, #3E #20 #77 #23 ' 
#DD, #23, #10, SFl, #DD. #E1 #CD K6 
#00, #3A, #B0, #5C, #rE, #65 #28 #i5 ' 
#DD. #6E, #04, #DD. #66. #05 #22 #33 
#20. #DD. #6E, #02, #DD, #66 #03' #22' 
#31. #20, #CD. #C9, #00. #3A, #64 '#00 ' 
#FB 
). 

END, 



IB for disk storeage : 



Main Program 

BEGIN 
PAGE; 

S^E-mL^' "^'"^ P™^^ ^ '° dernonst.^-): 
WRrreLN( how ^e may b« developed lo emulate the"). 
WRITELN('lype Stnng which is found in other ver-ion^'v 
WRrreLNCof PASCAL and also to demonstrate how " 
data); 

WRITELNCstored within records and arrays may be') 
WRITELNCtransfeired to and from the LARKEN Disk')- 
WrrELN('system using the procedures '■DalaStoreO" 

WBJTELN('"DataFelchO" ') 

WRTTELN; 

WRTfELN; 

WRTTELNCHit any key when ready ■) 

READLN; 

READ(Ans); 

RcadDala; 

PAGE; 



WRITECEnleianair 
READLN; 
READ(FileNanie); 

^^g'"^i'^Name,ADDR{D,rectory),SIZE(Directory)); 

WRrrE<'Data Stored ') 
WRFTELN; 

WRJlELNCNow to fetch the daa from the disk.'); 

WRJTELNCEnter a name for disk fetch >')■ 

READLN; 

READ(Fi]eName); 



PrintData; 
WRTTELN; 
WRTTELN; 

WRnELNCEnd of Demonslralion') 

' Actually, the vusi^''^'^^^'^^^^^ 
converted for use on the Timex/Sioclair 2068 could 
immediately access the ZX Microdrive which was a high- 
- compared to tape! - mass storage device. 
Unfortunately, the ZX Mcrodrives were relatively hard to 
come by m North America, 

- t ne UaiaStoreO and DataFetchO pracedutes like their 
tape counterparts TINO and TOUTQ, can be used 10 
liansfer virtually any section of RAM, including the screen 
buffer, on or off the disk by supplying the start and length 
P^eleis in the locations occupied by ADDRQ and 

^ Based in part on the HiSoft PASCAL demonstration 
program Tape. 

■' Unlike its t^ counteipart TINO. DalaFetchQ requires 
both the start address and the size of the file in bytes. 



^^^^^ Comparison Between 2068, PASCAL 
and Compiled BASIC fKMACHINEJ 

by Larry Kenny (Edited by David Solly from Mr. Kenny 1989 



(have been working on using my Time-t/Smclair 2068 to 
control a 3-axis drilling/routing machine using stepper 
motors To make the machine move in arcs and circles I 
needed to use the sine and cosine functions in the 
Tunex/Sindair 2068 ROM. After trying «"ne BASIC and 
machme language — using (he floating point mierprcter - 
routmes. I found that the program couldn't mn nearly fast 
enough to keep the machine busy at fijU speed 
PASCAL ^^"^ O""*". Solly, who is a long dme HiSoft 
<a J "^"e,' ""'^ '"^ * program using its 

sine/cosine tunclions so 1 could test it aaainsl 
Timex/Smclair 2068 BASIC and compiled BASIC 
The test program plots around a circle 100 limes. 
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The results: 



T/S-2068 BASIC interpreted 150 seconds 
Compiled BASIC (Timacbine) 126 seconds 

W Hi-Soft PASCAL 18 wconds 

owl The PASCAL really Hies even when doing 
floflling point math. It has all hs own math 
routines built in so it doesn'l do any ROM calls 
I hat also means that the compiled code can be burnt into an 
EPROM and mn on a Z80 based CPU without the 
Timeii'Smclair ROM resident 

The «,rnpil«l BASIC is only slightly faster that regular 
BASIC when the floating point routines are used 
Even calling th e Time:</Sinclair 2068 floating point 
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routines from machine code doesn't make much diifereDce. 
If you are writing a program that does a lot of 
calculation such as a spread sheet, 3d graphics, or 
CAD etc-, PASCAL will far out perfonn BASIC. 
Tfmex/Sinclair 2068 BASIC Circle Listing 
5 REM I OPEN « (Timachineonly) 
10 LET RAD = SO 
20 FOR A=0 TO 628 STEP .5 
30 PLOT 80 + RAD ' SIN A , 80 + RAD • COS A 
40 NEXT A 

50 PRINT "END OF PROGRAM 

HiSoft PASCAL Circle Listing 

PROGRAM CIRCLE, 

PROCEDURE PLOT (ON : BOOLEAN- X. Y 

INTEGER); 

BEGIN 

IF ON THEN WmE(CHR(21),CHR(0)) 
ELSE WRITE {CHR(21),CHR(1))- 
INLINE(#FD, m, »3A, #5C, 

#DD, tf46. 2, #DD. #4E. 4. 



#CD, #ES, #22); 
END; 

PROCEDURE CIRC; 
CONST RAD - 50; 
VAR 

A: REAL; 

ON : BOOLEAN; 
BEGM 

A:=0; 

ON -TRUE; 
REPEAT 

PLOT (ON. ENTIER(80 + RAD ♦ SIN(A)), 
ENTIER{80 + RAD • COS(A))); 
A;= A + 0.5; 
UNTIL A > 628- 
END; 

BEGIN ('MAIN PROGRAM*) 
CIRC; 

WRTTELN (-END OF PROGRAM'); 
END, 
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Editoi's Forum 

I'd Ufce to thank Per Witte for providing pretty much the 
core part of diis issue. I saw the Filename Parser proeram 
posted to the QL-users mailing list and thought it would be 
good materia] for an article. I contacted Per and he was 
willing to write sometiiing up. The length of tiie anicle was 
more that I ejcpeaed. but I'm not complaining. 

I'm still pressing forth witii the Qlib Source Boot_ Tve 
been delayed by a broken hand (out of cast and getting 
better). Tm pushing myself to get something out soon, 
even if only about 10% of what 1 would like to see in the 
Book, Tm looking for information about the history of 
Qlibaralor (the various releases) and any bugs in the current 
release (3.36). If you have some info, please send it to me. 
My other project is the QL PD Documentation Project (Pm 
using PD loosely lo mean (reely available), Tm trying to 
collect (in one location) a variety of released informalion 
about the QL and QDOS, Cunenlly I have a number of 
documents, including pans of the QL User Guide, a couple 
of Tutorials, and a few articles that Fve scanned in ftom 
IQLR_ Please take a look at my web site to see what Pve 
gathered. It is: 

www. geodtiea.com/SiliconVall ey/Pines/5 86 5/ 
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Shelling Out To SuperBASIC 

The QL Is unique in how QDOS and SuperBASIC are sort 
of rolled into one. Just as we can only have one copy of 
QDOS running, we can only have one copy of SuperBASIC 
running (OK, I know tiiis is not true for Minerva), 
In a traditional operating system model, there is the OS and 
the Shell, The Shell is a user interfece to the operating 
system, in UNIX there are many different shells; Boune 
(sh), C (csh), Kom (ksh), etc.. In MS-DOS the shell was in 
COMMAND.COM Even with Win95, there is a MS-DOS 
Shell still available, 

In most OS's, there can usually be more than one shell 
ftmning at one time Application programs can fire off 
another Shell and ran one or more commands. The new 
shell becomes a child process of the calling application. 
All of this comes about because the shell is nothing more 
than another user application. On the QL wo are limited in 
that only one copy of SuperBASIC can be run at one time at 
il must be Job 0, 

In QDOS, user applications can call other programs. An 
editor could call C68 (o compile a ptogiam that was just 
edited and saved. But when the command needed to tun is 
a built-in SuperBASIC command (which includes 
LOADable ejtteusions), there is no way lo shell out to 
SuperBASIC to tun the command. 

Iran into this problem when I wanted lo nm Qliberator 
from within MicroEmacs, MicroEmacs allows for 
executing programs from MicroEmacs, but 1 could not 
ran all the command for QLibetator diat I needed. To 
explain, here are the steps to run QLibetator 

1 , Load the program into SuperBASIC 

2, Call "Liberate" lo create a working file 

3 , Execute Qlib 

Here is a the steps in SuperBASIC terms- 
LOAD FLP1_TEST_BAS 
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LIBERATE FLPI TEST BAS 
EXEC QLIB 

Since 1 can'l call LOAD or LIBERATE fron. within 
MicroEmncs, 1 thought I could write a SupetBASIC 

LIBERATE, but LOAD is not a command that QLJb will 
compile. 

I thought I was smck until [ started reading the HotKey 
System H manual. It was there that ] ran across the two 
commands, HOT_CMD and HOT DO, 

HOT_CMD assigns to an ALT key, a command that 
will be entered in the SuperBASiC window (flO) I( 
does not have lo be an executable program, bul can 
be a SuperBASiC statement or a resident coSmaitdfUk^ 
TKII or DIYtoolldt). HOT_CMD -picks" the Supe^ASIC 
interpreter to the lop and the command i? ^mt 
SuperBASiC to be mn 

The HotKey System D was designed to be driven by the 
user, K is the user typing in a HotKey sequence that puts the 
system mto mouon. There in a HotKey command that 
HOT r^^ °^ HOT DO 

HOT_DOCa-) ,s the same as the user hitting the ALT-a 

Using HOT_CMD and HOT_DO in conjunction, the 
programmer can perform actions just as if they were 
shelhng- out to StiperBASIC, In the case staled 
above, here ,s how 1 would use the two commands to 
aulomale using Qliberator; 
10 files -"flpltestbas" 
20 ERT HOT_C\n)('a',T.OAD fileST 
30 HOT^DOfa') 

40 ERT HOT_CMDCb',lJBERATE filer) 
SOHOTDOCb') ^ 
60EXECQLIB_OBJ : REMaik Just EXEC it 
I can get away with having LIBERATE in a compiled QLib 
program, but not LOAD, He™ is a way to get a^und 



main focus of this article. 

Passing parameters by value is (what \ 

we normally do. RUNning the proeram &e 

10163111,2,3 

99 , 

100deiproclestl(a,b,c) 



Param«tor Passing Techniques In ffBASIC 

InQHJ#24 and #25 there were articles on parami"^ 
pa^smg techniques (By Tim Swenson and by Peter 
Tillier. respectively), I wont (loo much) re-hash whal's 
already been said (this article was prepared before I was 
aware of the other two), but look at the matterina 
practical way, that may sui, some readers 

TwBAfrr^'^^^ - ^■^"d 

I SuperBASiC mleipreler that comes with I.MVr, ...j 

S»p,^BASIC wift respM ,„ ,^b|, j^j.^ 

Sup^BASIC. Wl,.„ .ITeoB 4= «,bjm » h JTZ! 
try and po,M out ihe differences However I am 
pr=,e«l, nol able to ,„ „, examples in Sope^BASIC 
le incompattbiiities (ie . bugs) may be found Please 
ensUTp tliat ,.,^1.,.: j__ 



--e that die leehniques de^ribed work ^ 
a of S'BASIC before relying on ilent In any 

«< Value or Rsferencer >» 

There arc two way, of pasing parameters to ttmclions 
ud proeedurestn S-BASIC: by .d„,, ,hieh i. perhaps 
mmiove method; anti by referene e, which will be die 
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would prim -1 2 3- on your screen (with any luck!) And of 
course: 

in '^f'^^^ '^^'Sn values lo some variables 

20 lestl x,y,z. rem and use these instead, 
does the same. But a small modification of tea test2 
shows what's realiy going on- 

99; 

lOOdefproc lesl2(a,b,c) 
no prim a,b,c 

no a-a+a:b=b+b:c=cfc.rem Double all patameler 
vanables! 
!30enddef 
140 : 

The new harness: 
I0!(^l:y=2i=3 
20 lest2 )t,y,z 
30 print ![,y,z 

1 2 3 <- prints out X, y. & z, as expected 
12 31 ^ '"^"^'^ ^"'"^ ^^'^"^ ^ ^y.2to be 
By altering the values of the parameter variables a, b, & c 
vie cause a change lo the calling variables x, y & z loo' 
This IS a call by reference; we don't pass to the procedure 
merely the values the variables comain. instead we refer lo 
the ongmat variables - a, b & c ARE y, ^ only by a 
ainerent name. As you will appreciate passing panuneters 
by reference is not always desirable. In ftct, unless you 
specifically want to do so. il could be a real pain- You can 
see how a procedure might easily (and unintended by 
you) alter its parameters, and thereby variables external 
to Itself To avoid this you can apply the rule never lo alter 
a procedure's formal parameters within the procedure or 
you must, pass your variables by value only. But how to do 

If you typed: lesl2 1,2,3, what do you think happens to 
a, b, c7 Well, their values are simply thrown away 
when the routine returns. By extension, the same 
holds good fortest2pi-l,q+i,r4-i, having ptei^ously set 
Pi q, r to some value. Anything other than a vari^le is 
considered an expression m this context, and can therefore 
Thus: ™ 
10x=|:y-2:z=3 
20 test2(x),y^-0,z''l 
30 print x.y,z 

1 2 3 <- prints out X, y, & z, as expected 
i 2 3 <- prints out X, y, & ^ as expectedf?) 
(rood programming practice would avoid altering the 
parameter variables - copy their values into LOCal 
vanables insteadi In my opinion, le3t2 (K),(y) (zl gives 
the clearest indication of intent, besides bemg (margiMlly) 
faster than say. x+O.y+o.z+o. and so isa good convention 
to adopt for call by value. 
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«< Coercion »> 

There are other "oddities" about the way parameter 

passing works. For example: 

10xS='a':y=3:zyrf 

20 lBsl3 xS,y,£% 

30 prim xS,y,z% 

99 : 

100 defproc test3(a,b,c) 
110 print a,b,c 

120fl-a&a:b = b/2:c-c/2 

130 enddef 

140: 

RUNning this program produces: 
a 3 3 <-xS y z% 
aa 1.5 2 

Not what you'd think, looking at the formal parameters a, b, 
o! However, this can be very usetiil, as will be shown later 
Things Id watch out for though are: You may assume that 
the Formal parameter decides the type, when it achjally is 
the calling parameter thai does sol An example mieht be 
10x-I:y=4 
20&«_testx,y.lO 
99: 

100 deQiroc fest_teBt(a%,b%,c%) 
110 rep loop 

120 a%=a%+l:b%-b%+b%:cf.=c% div 3 
130 if c%=0:exit loop 
140 endrep loop 
150 enddef 
160 : 

You're expending all this effort optimizing festjest; 
changing out floating point variables with integers, and the 
^ke. You need not have bothered! This is what it's acWally 

120 a-a+l:b=b+b:c=c div 3 
to £ict everything runs in (relatively) slow I 
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iOxM=l;y%=4:z%=10 
20 fiistjest )c%,y%,z% 

will pass integers to iastj:e3t, and/or 

100 deiproc fa3t_tesl(a%,b% c%) 
1101oci%,s%,t% 

120 i%=a%:s%=b%:t%-c% etc., 

What you then use in the formal parameter list is 
irrelevant (encept as a reminder as to what the 
correct type should bel) Also copying the 
parameters into LOCal variabies will coerce the parameters 
back to the desired type In tk2 there are commands to test 
the parameters lhal are passed to a procedure: PARTYP 
tells you the actual parameter type (nul (never nul in 
SBASIC). string, float, or integer) and PARUSE whether 
the parameter is an array or not 
< Returning Values through the Parameter List > 
A 'by-product" of the ability to pass parameters by 
reference, is that we can actually return more than one 
value to the calling program. Both fiinctions and 
procedures can be used for this. I find the 

limction^ciTor = Function(update-able parameter list) 
conarucl particularly useful, as 1 hope to show. Below 
follows a commenled listing on a filename parsing utility 
ibr S 'BASIC that hopefully illustrates the technique 
I PRINT, '(Simplyfied) Filename Parser' 
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5 dfnmS-'winl bas util^fnm ParseFnm bas' 

6 er=ParseFnm(dlhmI,ddevS,ddirS,dnm3,de«$) 
7PRINT\\'Fnm:'ldfnmS™ev'lddevS\Dir'lddirS\ 

8 PRINT 'Nme:'ldomS\'>a:'idextS\'En- 'ler 

9 STOP 
10 : 

Above, The first pan of the program gives some 
information, and shows and example of usage. 
32724 DEFine FuNction Par3eFnm(fS,vI.dS,nS,eS) 
Thispait ofthe program is the object of the enterprise, the 
file name parser itself Due to the oatuie of the QL's file 
system (FS), it is impossible to determine how much ofthe 
latter part of the name is filename and how much is 
duectory name merely by inspecting the filespec. You 
have to actually open the file (or its directory) to find out. 
The limclion does this, and then breaks up the (ilespec 
according to a miwure of known facts and assumptions 
(i.e., if s not foolproof) It puts the different sections into the 
supplied variables, and retunis ok. 

The fiinclion is defined as a floating point tiinction, 
even though its main task is to manipulate, and you 
might say, relum text. In this, simplified, version 
any values pre-supplied in vS..e3 are overwritten. The 
only parameter you should supply is the fS (for Full 
Filespec) This is (more or less) expected to he in the form 

key: o = name. | = or, [] = optional (0..1); 
{) = repeated (0. ) 
<sep> = directory separator, ' J 
<exsep>= extension separator, | ,' (SMSQ/E) 
<filespec> = 

^device namexdrive number (1..8)xscp> 
(<directory seci;onXsep>J 
[<filename>[<e>!sep>[<extensi on>] ]] 

32725 LOCal c,tp%,i% 

32726 REMark Split filename into components 

32727 c=FOP_DIR(fS):IF c<0:RETum c 

FOP DIR is a fimction (introduced in Toolkit LTl (tk2), by 
TonyTebby, and included with many disk interfaces, and 
in SMSQ'). It tries to make the best of the information 
supplied, and will open the first directory that matches the 
first part ofthe filespec. So if you have a directory 
called 'winl_a5m_'{butnonecalled'winl_asm_prg_ ') 
and you did a ERTFOP_DIR(winl asm_prg_lemp} the 



flinction would oi 



'taking the n 



ofthe filespec to be a filename! 

32728 dS-FNAMES(#c)TCLOSEfc 

FN AMES (also a function &om tk2) returns the name of 
any file, also directory files So, continuing our specific 
example above, dS (for Directory) would now contain 'asm' 
- Note the device name is not returned 

32729 IF LEN(dS) THEN 

FNAMEJ did return (at least the first) part ofthe directory 

32730 p%=dSINSTRfS:IFp%=0 RETum-7 

If the filename returned by FN AMES is. after all, not in the 
filespec return the error Not Found. 
(This, would be the case if you tried to 
DATA_USE'winl asm' 



ERT FOP_DIR(#3;'(ibc_teslO 
FNAMES(#3) would then return 'asm') 

32731 dS=dS&'_' 

IfdSJs^ a substring of filespec. append the filename 
^ator (as the last one is not stored in the director 

32732 ELSE 

At this point dl is ■■, This could mean that <root> had 
been specified, that no matching directory was 
found (e.g. had we specified ■winl_prog_tmip ' 
and there was no 'winl_proB .; ), or that something 
was wrong, ' 

32733 p%=C_' mSTR f5>H 

Do a primitive test on the filespec to see if it contains a 
devicename, e.g. Vinl ' 
32734ENDIF 

32735 vJ=REMVSCp%,LEN(fJ),f5) 
vS stands for deVicename. vl gets set to the first part of 
fiiespec, up to the first underscore 

32736 IF LEN(vS)<3:RETum -12 
Better would have been. 

32735 IF p%<3 OR p%>i iRETura -12 
This version of the filename parser doesnt support 
networited drives, so: 

32735 IF p%o5,RETum -12 
would be correct here. Then: 

32736 vS-REMVS(p%,LEN(fS).15) 
Tests whether the first part of the filespec is a possible 
devicename, (Devicenames can only legally be 3 4 or 5 
characters long, as in: SIJ. 'n63J, 'i^j. An^g 
other IS an error. Further tests should be done hereto 
detennme whether vS is 'legal' device name, but diere is no 
easy way of knowing for sure (Try 
OPEN_NEWM; ■flp7^test':PRrNT FNAMES(#3) and see 
Wlat you get (presuming you don't have an flo? ) 

32737 IF p%+LEN(dS>=LEN{fS) THEN 

32738 nS=":e$=" 

We allow filespec to be incornplele from devicename 
down. In the case above filespec = device name & 

Sel^^ ' ' '^"^ "^'^^ '"'^ 

32740 nS-REMVS(I.p%+LEN(dS>l,i5) 
TRiere is a name (and possibly an Kttension), Let nS (for 
fileName)holditfornow 

32741 p%=0 

32742 FOR i%=LEN<nJ) TO 1 STEP -1 

32743 IFnI(i%)INSTR' .':p%H% EX!T i% 

32744 END FOR iK 

Here we just check filename fiom the end of the string for 
the first ■ ' or 'J it encounters, TTiis. it decides, will be the 



32745 IFp%=OTHEN 

32745 eS='' 

No extension found 

32747 ELSE 

32748 e$-REMVS(0.p%-ln$) 

32749 nI=REMVS(p%,99.nS) 
Slice filename into name part and i 

32750 END IF 

32751 END IF 

32752 RETum 0 
Return OK. 
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32753 END DEFine 

32754 : 

The final part of the program is a help-fiinction 
REMOVES (shortened to REMVJ in lis S'BASIC 
incarnation) all it does is to simplify string slicing by 
encapsulating ail the error trapping. It won't be looked at 

32755 DEFine FuNction REMVS{fi%,to% strS) 

32756 IF ii% < 2 THEN 

32757 IFto%>=LEN(Etr$):RETura" 

32758 RETum strS(io% + I TO LEN(strS)) 

32759 END IF 

32760 IF to% >=LEN(sItS) THEN 

32761 RETiimstrS(lTOfi%-.l) 
3Z762 ELSE 

32763 RETstrS(l TO 6% - 1 ) & strS(to% + I TO 
LEN(strS)) 

32764 END IF 

32765 END DEFine 
32765 : 

The weird numbering scheme is to enable the function to 
be easily MERGEd into a larger program that needs 
It; linenumbcrs <100 can be removed afler testing, 
«< Arrays as Parameters >» 

Also arrays are passed by reference; when you supply an 
array parameter you are allowing the procedure to access 
your actual array. The same rules described above 
regarding type coercion also apply to arrays 
Unfortunately, S'BASIC provides only limited "mass" 
operations (for lack of a better tenn) on arrays though you 
can pretty much slice them up any which way you choose 
This comes in handy if you want to write your own mass- 
ops b S*BASIC or machine code. You can't do a = b with 
arrays in S'BASIC but you can write your own EQU a TO 
b. which does exactly the same (see commented listing of 
EQU below). 

1 DIMa3(2,2,2,2.6).bS(2.2A2.8) 

2 DIM a(2,2,2,2).b(2,2,2,2) 

3FORi%-0 T0 2JORj%^TO 2:F0Rk%-0 TO 
2:F0R l%-0 TO 

2:aS(i%j%,k%,l%)='L'&io^4j%&lrt4&iy„ 
4 counl%=0 

5FORi%=0 T02J0R j%KiTO 2:FORk%-0 TO 
2:F0R l%=OTO 

2:a(i%j%,k%,l%)-count%:cQuntyo=couni%-H 

Above, Initialise a ffew test anays (use plenty of 
dimensions ■) Note you'll have to modily all integer 
SuperBASla Program run under plain QL 

10CLS:PRINTa$,\ 
i2ei=EQU(bS,aS} 

14 CLSS0:CLS*i2:PRINTfl2,bS \ PRINT«O er 
16 BEEP 2000,20:PAUSE 

15 CLS:PIUNT la!\ 
20 er=EQU(b TO a} 

22 CLSS2:PRINT#2tb!\:PRINT#0 er\ 
24 BEEP 2000,20 
26 : 

Test harness. Edit to taste 

100 REMark EQU SBASIC fbnclion to 

101 REM ark EQUate two arrays of the 

17 ' 
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1 02 REMark same dimensions and type 

103 REMark Requires lk2 oi equivaleni 
104 

105 REMark OPWilte, Augusi 1998 

106 REMaik For "educarional" purposes only 

107 REMark Use at own risk. No wairantiesi 
108: 

Can't say you haven't been warned ! 
1000 DEFine FuNction EQU(a,b) 

The idea is to equate array a with array b in a reasonably 
rational maimer, while demonstrating some of the nicelies 
of parameter passing techniques using arrays, at the same 

The first thing to note is that EQU will handle any 
type of array i.e.. integer, sling, & float - although 
the parameter list only shows float! Also, any 
number of dimensions are handled. The only provision, in 
this implementation, is thai they are of the same type and 
have the same nun^er and size of dimensions (except 
string, in the last dimension). 
1010 LOCal er 

This nice little feature of "inheritance" is not documented 
anywhere, as far as 1 know: 

A LOCal variable defined in one procedure will remain 
local in any procedure called by that procedure, unless 
the variable has been "re-defined" by a subsequent use of 
LOCal, 

Here the local variable, er (error flag) is set in EQU, 
the calling function, and modified in EQN/EQs' 
Yel a variable er. defined in the initial code, 
outside any procedure body, would retain its original 
value. The only danger lies in that if the same sub- 
roinines were to be reused by another procedure, you may 
forget to declare it as LOCal in the calling procedure and 
end up mysteriously modifying a GLOBal variable instead! 
It certainly saves the repeated overhead of stacking a local 
variable for each recursive call to EQN/EQS here, as 
would be the case if we defined er EQN/EQS 
1020 IF PARTYP(a)oPARTYP(b) RETum -15 
1030 IF PARUSE(a)o-PARUSE(b):RETum -17 
Checks whether parameters are arrays, and of (he same 
type The error checking here is not foolproof 
1040 er=0 

1050 IF PARTYP(a)=l THEN 
1060 RETum EQS(a,b) 
1070 ELSE 

1080 RETura EQN(a,b) 
1090 END IF 

String arrays must be handled slightly differeuUy lo 
numeric ones, in that the last dimension is the string 
itself It might be possible lo fuid a universal algorithm, to 
handle numbers and strings, but it makes sense to use the 
buik-in mass assignment features and copy whole strings at 
once, rather than byte by byte. So the string and numeric 
sides have been implemented as separate fimctions. 
Another advantage is that this offers the opportunhy to 
optimize them (how ever slightly) for their differeol uses. 
11 00 END DEFine 
1110 : 

2000 DEFine FuNction EQN{a,b) 
2010 LOCal i% 

Another reason for separating out these sub-routines as 



fijncuons. is that we can lake advantage of the 
interpreter's excellent array slicing abilities, as in line 2070 
2020 IF DIMN(a)oDIMN(fa):RETum -4 

Every dimension has lo malch in size This test will 
be performed before any processing takes place. The 
alternative would be to use a special sub-routine 
2030 IF DIMN(a(0))=0 THEN 

Look-ahead: If the ne« dimension is past the last, then 

this is the dimension we can work with: 

2040 FOR i%=0 TO DIMN(a):a(i%)=b(i%) 

Copy this dimension from b to a, element by element. 

This also tenninates recursion at this level 

2050 ELSE 

2060 FOR i%K) TO DIMN(a) 

2070 ei=EQN(a(i%},b(i%)):IF er<0 EXIT i% 

20S0 END FOR i% 

More than anytfaing. a fiinction Uke EQU warns speed, 
so loops have been specialized, reducing the overheads of 
teslft branch. The use of recursion is almost necessary, 
thanks to the parser's array-slicing abilities I 
2090 END IF 
2100 RETum er 

The error-checking stuff is nol strialy necessary in 
a programming toolkit -error-checking is 
performed at the program level - but it's easier to 
delete it than add it when needed (e.g. during program 
development). 
21 10 END DEFine 
2120: 

3000 DEFine FuNction EQSCa.b) 

Pretty much Ihe same as fbrEQN above, bu I optimized 

for siring operations. 

3010 LOCal i% 

Note that the same technique cannot be used for i%aser. 
i%'s value will he different at differenl levels of 
recursion i.e., i% has to be saved between levels. 
3020 W DIMN(a>oDIMN(b):RETum -4 
3030 IF DIMN(a(0.01l-OTIinN 

This arrangement was actually a bug, as no 
comparison is made on the last dimension. 
However, as the imerpreter doesnl complain and 
simply ignores iharacters, I thought 

I'd leave it there as a feature 

le, DIM aI(5,10),bS(5,8): er=EQU(bS,aS) 
works, thou^ any strings longer than ci^l characters will 
be truncated. 

3030 IF DlMN(a(0,0))=O THEN 

Remember aQ refers to an array of type string! Operations 

can be perfomied at a higher structural level, so we 

lerminale recursion one level up. 

3040 FOR i%=0 TO DIMN(a):a(i%)'b(i%) 

Copy one whole string at a time 

3050 ELSE 

3060 FOR i%=0 TO DIMN(a) 

3070 er-EQS(a(i%),b(i%)):IF er<0:EXrr i% 

3080 END FOR i% 

3090 END IF 

3100 RETum er 

3 1 10 END DEFine 

3120 

Genume bug/incompotibiiity reports, suggestions and 
welcome. Send to pjwitte@knoware.nl 
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^ Ads 

Place your ads here, it is FH£F' 

A. KAHALE 3 343 S FUT ROCK CT SIERRA VISTA AZ 65650-6874 
M and/or update the Rdiinr nf . „ ,. . : 



SPECTRUM for your 2068 

If you ar= a LarKen LK-DOS owner and would like lo ran SPECTRUM 
proErsDis on yout system, we mU supply a V2 EPROM, socket and 
74HCT32 for 112 v/hich includes shipping and handling. The histiU- 
Inaon msnuctions are m yonr LaiKen 
sibic for your inaiall job. A 
S 10 fonvanled to LarKon. 

Bob Swogcr 



747 ^Hgllt ^imuUtox 

So you like to Dy. Ihc 747 Fhght Siraulalor for SPECTRUM by Derdt 
Ashion of DACC. Requires a SPECTRUM equipped 2063. Supohcd 
on LarKen SSDD or DSDD LarKen disk for SIO «*ich goes lo Derek 
now wortang at Mouirols with Bob. 



A Strategic Generic War Game for the TS-2068 
CONCUCST 

>■ Available on tape, or disk. AERCO, OUger Game and map 
SAVES m BASIC allows conversion to your system. 
> Completely in fast machine code. Gaines can be SAVEd and 
COOTINUEd. Price $19.95 + 12.50 S&H. 

Order from:- or:- 
Lloyd Dreger SMUG 
2461 S. 79th St Box 101 

West AIMS Wl 53219 Birtler Wl 53fin7 



The John OUger Co. 

11601 Widbey Dr. 
Cumberland IN 46229 
The Joha Oliger Floppy Disk System 
FOR THE TS-2 06S 
Disfa Works 
Expansion board 
2068 UaerCartridEC 
Disk Boards "a" & "B" 
2068 Parallel Printer Port 
2068 EPROM Programmer 
2068/SPECTRUM Joyalick Port 
DFh Mapped Universal I/O Port board 
User Manua l only : $5.00 (Read before vou hi.vl 



Sarvloe For AmerloH-s 

Favorite Home Computers and Their Accessories 

SINCLAIR 

TCVIEX ADAM ATARI IBM OSBORNE 
TI COMMODORE TRS-80 
BUY SELL TRADE UPGRADE 
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Repair Ch arge Examolps 
TS-IOOO, 2X-81, IOI6RAMPflck, Memotech. ZEBRA Talker, 
MIRACLE Centronics, RAM Centronics. 
J5.00 each + parts & shipping 
TS^2020, 2040, PC-8300, ZX-BO, TI-99. Z-SIO, Byte-Back 
AERCO 2068 Centronics, BASlCare. LaiKen RAMDisk ' 
$10,00 each + parts & shipping 
TS-2068, Spectnmi, A&J MicrD, Muacle 5 1 2K, LarKen 1 000 
& 2068 FDI. Kempston EDI, Cumana FDI, CST FDI, 

S15.00 each + parts & shipping. July 1, 19% 
Reasonable fiat rate plus parts and shipping. 
Write or caU for prices , SASE appreciated 

COMPUTER 
CLASSICS 

RT1, Box 117 
Cabool MO 65689 

Ptione 417 469-4571 417467-4571 



ZX-TEXT - Word Processor 
ZX-CALC - Spread Sheet 

Business Software 

Cycle Accounting Financial Raport Generator 
ZX-CALENDAR - Time Management 
ZX-B1 TS-1000 TS-1500 TS-2068 

Albert F. Rodriguez 

A.F.R. Software® 

1605 Pennsylvania Ave 204 
Miami Beach FL 33139 
30S 531-6464 





1 QLAMBer 


$20 


PLvrvi'i s' 


QLuMSi 


$20 


SOFl^WAKE 


SeekQL 


$10 




Upgrades 


$5 



J fit Jeng 

914 Rio Vista Cir SW 
Albuquerque NM 87105 
(505) 843-8414 



Bill Cable 

ARCHIVE Based QL Software 

QLerk - A complele financial program for the QL 
QLerk software (v3.21} witti tutorial $29 
QLerk manual $29 
QLerk software & manual $50 
DBEasy - A menu based database system 

DBEasy software (v1 .6) $24 
DBEasy upgrade from VI ,5 $7 
DBProgs - A toolkit of ARCHIVE procedures 

DBProgs software (v1 .6} $1 a 

OBProgs upgrade from VI ,7 $7 
DBTutor - A general purpose leamrng program 

DBTutorsoftware(v1.5) j12 
PC DBEasy - Just like QL DBEasy but you must have 
PC ARCHIVE to use It. 

PC DBEasy software (v1,3) $12 
Wood & Wind Computing 
RR3 BOX 92 
Cornish NH 03745 USA 
Phone (603)675-2213 
Emaif : bcable@triton coaLcom 



QBox XJSA 

810 254-9878 
.14 hours a day 
300 to 28,800 bps 
Supporting all Sinclair and Timex users Fidonet 
echomail areas for Sinciair computers Lots of new 
files for you to download such asTS-2D68 emulator 
for those who use a PC give us a call and let us 
know what you want to see 
Message area and file area 
QL International, Quanta, QL Hacker's Journal 
Spectnjm/2068, ZX-81/TS-1 OOD, Z85, NetMail.' 
emulators, pointer, FDFomiat for QXUQDOS, etc. 
Sysop John J Impellizzeri 
Co-Sysop Don Walterman 
Utica, Michifian, USA 



IDcninc Cubes 

Hirdw&re fi SoUwire 

352 7"^ Ave. 15* Fir. 
New York, NY 10001 
Phone 212 631-7563 
Fax 212 947-5069 Voice mail pager 91 7 490-8407 
Dom(no.cut>es@excel sior.net 



Make David an Offer 
2X-8 1 /TS-1 000 TS-206a 
Hardware Kits 
Real Time Clock I/O Controller RS-232 
Centronics 1/F I6K & 64K RAM 300 BAUD 
Modem A-D Converter(assembled) 
BVTE-BACK INC 



1 O 1 IHLg Newsletter 
Tkf. Long Isl-od SinclaWTimex Users Gro 
Robert Malloy, Treasurer 
412 Pacific SL 
Massapeque Park. NY 1 1762 



Robert Gilder 



New England Sinclair QL Users Group 

16 Highland Ave 
Saugus MA 01906 
617 233-367 1 



QL Hacker's Journal 



Supporting All QL Programmer: 



Timothy Swenson, ii^ror 



bap://www.geocilie3.coni/SllconValley/Pine5/5 865/ 



CATS Newsletter 

The Capita] Area T/S Users Group 

Barry Washington 
7044 Cindy Ln 
Annandale VA 22003 
301 589-7407 
BBS 301 588-0579 
Internet mfl)Q02(5ieDf12.epfiba!tagrg 



^tlialettfr 

go Area Timex Usi 
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Streamwood IL 60107-1647 

630 837-7957 
G ENG-1 oe^email.moLcom 


with sections on utilities and BASIC drivers for 
modified commercial software and switching system 
ROMs without powenng down. 
Available for $15 from 
FWD Computing 


The Ramtop 

Newsletter 

The Greater Cleveland T-S User Group 

Thomas Simon Editor 

615 School Ave 
Cuyahoga Falls OH 44221 
E-Mail CIS 73177,333 
Jon Kaczor Production 
4568 Williamson Ave 
Brooklyn OH 44144 
75363. 1127(acompusen/e com 


Items for the T\S Computers 

Timcworks PrDgramming kit #1 ForT/S lOOO&ZXSI $4,95 
Mindware Gulp Game Timex 1000 & Sinclair ZX8I $4.95 
Tiraei Horace & The Spiders for the 206S. S5.9S 
Tunex Sinclair 1000 software on tape 
Chess(]6KRAM)qly5 price S2 95 ea 
The Challenger I qty 17 price $2.95 ea 
Mindware MWl 00 plain paper primer for the TS 1 000 or 

ZX81 computer made in the US. 545,00 
All items are new. Please add 33.95 shipping to all orders. 
MC. VISA, American Express, phone 717-748-1747 
Keith Electronics 
224 North Grove St 
Lock Haven, PA. 17745 


Peter Liebert-Adelt 
LUETZOW STR 3 
D-38102 BRAUNSCHWEIG 

GERMANY 
Email: P-liebert@t-on;ine.de 
http://lioine.t-oniine. de/home/p. liebert/zx-leam. him 


The ZX Spectrum 48/128 Emulator 

for IBM & Compatables: ZSO Version 2,01 

Turn your PC into a real ZX Spectrum 48/123' 
^- Full Specltum emulaton, border, flash, beeper. Interface 1 
Mic^odnve m cartridge file, RS232 input and output redirection 
to file COM or LPT. joystick support, 12eK sound through 
boundblasler or internal speaker, built-in monitor 

Able to load ANY, even protected or speed-saved program 
Mm tape, to save to tape, to redirect tape loads and saves to 
disk tor easy file access. 

2500 line English documentation. 

ZBO processor amulabon including R register, inofficial in- 
structions, inofficial flags, 

Runs okay under DOS, Windows and DesqView, 
Full source code of emulator and utilities indudedl 
Runs on any 640K PC; loo slow for practical use on PC/XTs 
but fast enough on Ars : mns at aliout 100% on 16MHz ATs 
,^1 ,-5° slovred down on faster machines), uses 
VGA;eGA/CGA or Hercules. 
This program costs US S20. You will receive a 3 5" DD disk 
(5 25- disks on request), and you'll be kept infonned about up- 
dates. Please send bank notes (bills), name and address to: 
Gerton Liinter 
PO Box 2535 
NL-9704 CM Groningen 
Netherland 

If you send a cheque, please add US S15 enra and allow 4 
weeks for delivery 


FOn SALE: Cooner QlC-80 tape backup (kil) with four 
new (sealed) pre-foimalted tapes very linle use. $75 00 (In- 
cludes shipping) 

Al Feng 
914 Rio Vista Cir SW 
Albuquerque, NM 87105 
(505) 843-8414 


WAfJ 1 tl>; tjflrtridges! For the TS2068: VU-Calc VU- 
File. Budgeler, Pinball, Androids. Penetralor, Zebra OS-64 
LarKen LKDOS. Ohger JLODOS, Spectrum ROM. Buckg^- 
mon. Bhnd Alley. Chess. Himgty Horace, Horace & the Sp,^ 
ders, Horace Goes Skiing, Zeus Assembier, Zeus Hi-Monilor 
Zeus Lo-Monitor; also EPROMs for the EPROM module For 
TS 1000/1 5O0: TS 1 5 10 caitridge module, cartridges Chess Su- 
pennath. Stales & Capitals. FUghl Simulator; Rompak Eprom- 
Holder Cartridge and any EPROMs. 

Russ Perry Jr. 
21 75 S Tonne Dr #105 
Arlington Hts, IL 60005 

847-952-9729 


LogiCall 6.0 

Tke Fmal Veraion 

Newly updated, easy-to-read, LarKen 
LKDOS ver, 3 Manual 

Includes missing infonnation related to the JLO and the 
.naiiiaii D '-ri, mouse and re-numbenog program. 

Updated version 6.0 LogiCall Manual 
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The RomDisk! Fully functional! 

See^ previous issue of QL Today Extremely small board for the 
QL's ROM-Pott, works hke a peraianem RAM disk, even if the 
power is token away, contents are not lost I 
RomDisk 2 MB DM129, 
RomDisk 4 MB jjm jgg 
RomDisk SMB dM 299 
Aurora Adapter for RomDisk DM 9,90 

Special Offer 

rhe color drivers are coming. In order to be able to upgrade to 
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the color dnvera. you need to have SMSQ/E, The normal 
SMSQ which 13 shipped with QXL card will not be able to han- 
dle more colors. To beneSt from the colors in ihe fiiture, and 
benefit now from the eflra features of SMSQ/E, here is a 
special offer; 

SMSQ/E for the QXL 

o„„ DM 169. 

As Aurora owners will be able to use more colors when the 
color drivers are avaiiabie. another offer for SMSQ/E for the 
Aurora plus GoldCard/Super/GoldCard: 

SMSQ/E for the Super GoldCard 
QL Games & Upgrades 

QL Applications 
ProWesS + Applications 
Jochen Merz Software 
Im stillen Winkel 12 
47169 Duisburg, Germany 
8 0203-50201 1 
Fax 0203-502012 
Credit Cards accepted 
http://www.j-m-s.com/snisq/ 
e-mai] smsqi3ii-m-s.com 


ZX-SX Kit 

$30 Plus SIO 
for shipping and handling 
TS-2040 Printers 16K RAM 

We Do Not Ship Outside The US S Canada 
Checks. Money Orders and Visa or Mastercard 
Call 212-675-8414 FAX 2I2-675-S9S0 

Zebra Systems, Inc. 
122W26th St. Suite. 904 
New York, NY 10001 
Shipping is by UPS ground. 
Basics orTimei Sinclair 1500/1 DOO BASIC 
A copy of this book is shipped free with each ZX-8 ! kit. 
Allen Wolach, Separately priced S12.95 
BASIC Basics far the Timcx/Sindair 1500/1000 
A copy of this book is shipped &ee with each ZX-8 1 kit, 
Michael Baraett/ZSimon Bamett, Separately priced S12.5S 
The Ins and OuUofthe TimeiTS-IOOO & ZX-8I 
Don Tfaomasson, S12,95 
Computer InlerFacing Tecbnique in Science TS-1500/1000 
Paul Field & John Davies, S12.95 
ZX-Sl BASIC Pragramming (in Spanish language) 
Sieve Vickers (Traducido y adaplado) A copy of this book is 
shipped free for asking if you just pay for additional shipping 
cost. Separately priced SIO 




Alec Carswell 

MOTIVATION 

Beith Ayrshire 1^151 EL 
United Kingdom 


Who is doing it? 

QL Today is being published by jocben Merz Software, 
Jochcti Merz has been supplying software for the QL for several 
years and has built up a good reputation for quality and fait 
trading. The representative in Britain is Miracle Systems Ltd. 
who lake subscriptions and do the distribution. The articles in 
the magazine are written by a number of prominent QLers and 
Ihe editor is Dilwyn Jones. 

Subscriptions 
Germany (+GGrrnan add-on) DM 70 
England DM 60 £25 
Rest of the world DM70 £30 
Back-issues are available for DM 12 (incl. postage) 
Checks should he made payable Miracle Systems Ltd. 

English Office 

Miracle Systems Ltd. 

20 Mow Barton 
Yafes, Bristol 
United Kingdom BS17 5NF 
Te!, +441454 883602 Fax. +44 1454 883602 

Editor 

Dilwyn Jones 
41 Bro Emrys 
Tal-Y-Bont, Bangor. Gwynedd 
United Kingdom LL57 3YT 
Tel. +44 1248 354023 Fait +44 1248 354023 




JackDohany (Developer - 2068) 
627 Vera Ave 
Redwood City CA 94061 
John UoMichael (Developer - Graphics) 
1710 Palmer Dr 
Laramie WY B2070 
Bill Russell (QL) 
Russel Electronics 
RR1 80x539 
Center Hail PA 16828 

Keith Watson 
AERCO & Z30 Emulator 

41634 Amberfy Dr, 
Ml. Clemens, Ml 48038 

Rod Gowen (RMG) 
14784 S Quail Grove Cir 
Oregon City OR 97045-8843 
Send them a LSASE and ask for information about 
their current products and/or services. 



